﻿'Params
'discovery (Optional) : Whether to request last.fm content with discovery mode switched on.
'rtp (Optional) : Whether the user is scrobbling or not during this radio session (helps content generation)
'buylinks (Optional) : Whether the response should contain links for purchase/download, if available (default false)
'speed_multiplier (Optional) : The rate at which to provide the stream (supported multipliers are 1.0 and 2.0)
'bitrate (Optional) : What bitrate to stream content at, in kbps (supported bitrates are 64 and 128)
'api_key (Required) : A Last.fm API key.
'api_sig (Required) : A Last.fm method signature. See authentication for more information.
'sk (Required) : A session key generated by authenticating a user via the authentication protocol.
'Auth
'This service requires authentication. Please see our authentication how-to.

Public Class RadioGetPlaylist
	Inherits BaseRequest
	Dim discovery As String = ""
	Dim rtp As String = ""
	Dim buylinks As String = ""
	Dim speed_multiplier As String = ""
	Dim bitrate As String = ""

	Public xmlresponse As XDocument = Nothing

	Public Sub New(discovery As String, rtp As String, buylinks As String, speed_multiplier As String, bitrate As String)
		Me.discovery = discovery
		Me.rtp = rtp
		Me.buylinks = buylinks
		Me.speed_multiplier = speed_multiplier
		Me.bitrate = bitrate
	End Sub

	Public Sub sendRequest()
		'InitializeMembers("album.getInfo")

		'AddMember("artist", artist, String.IsNullOrEmpty(mbid))
		'AddMember("album", album, String.IsNullOrEmpty(mbid))
		'AddMember("mbid", mbid, False)
		'AddMember("lang", lang, False)
		'AddMember("autocorrect", autocorrect, False)
		'AddMember("username", My.Settings.username, False)
		'AddMember("api_key", My.Settings.api_key, False)

		'xmlresponse = sendPOSTResponse()
	End Sub

	'	Public Function getResponse() As AlbumGetInfoResponse
	'	Dim response As New AlbumGetInfoResponse
	'		response.album = New Album(xmlresponse.<lfm>.<album>.First)
	'		Return response
	'	End Function
End Class
